#!/usr/bin/perl
##props.pl
use strict;
use warnings;
use Config::Properties;

# reading...
open PROPS, "<config.props" 
  or die "Unable to open the configuration file";

my $properties = new Config::Properties();
$properties->load(*PROPS);
my $value = $properties->getProperty(my $key);
print "$value\n";
